home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Scrap.a < prev    next >
Encoding:
Text File  |  1997-08-12  |  2.6 KB  |  99 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Scrap.a
  3. ;
  4. ;    Contains:    Scrap Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.0.1
  8. ;
  9. ;    Copyright:    © 1985-1997 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__SCRAP__') = 'UNDEFINED' THEN
  19. __SCRAP__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.  
  25.  
  26. ;  _________________________________________________________________________________________________________
  27. ;   • CLASSIC SCRAP MANAGER API
  28. ;  _________________________________________________________________________________________________________
  29.  
  30.  
  31. ScrapStuff                RECORD 0
  32. scrapSize                 ds.l    1                ; offset: $0 (0)
  33. scrapHandle                 ds.l    1                ; offset: $4 (4)
  34. scrapCount                 ds.w    1                ; offset: $8 (8)
  35. scrapState                 ds.w    1                ; offset: $A (10)
  36. scrapName                 ds.l    1                ; offset: $C (12)
  37. sizeof                     EQU *                    ; size:   $10 (16)
  38.                         ENDR
  39. ; typedef struct ScrapStuff *            PScrapStuff
  40.  
  41. ; typedef struct ScrapStuff *            ScrapStuffPtr
  42.  
  43. ;
  44. ; pascal ScrapStuffPtr InfoScrap(void )
  45. ;
  46.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  47.         _InfoScrap:    OPWORD    $A9F9
  48.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  49.         IMPORT_CFM_FUNCTION InfoScrap
  50.     ENDIF
  51.  
  52. ;
  53. ; pascal SInt32 UnloadScrap(void )
  54. ;
  55.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  56.         _UnloadScrap:    OPWORD    $A9FA
  57.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  58.         IMPORT_CFM_FUNCTION UnloadScrap
  59.     ENDIF
  60.  
  61. ;
  62. ; pascal SInt32 LoadScrap(void )
  63. ;
  64.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  65.         _LoadScrap:    OPWORD    $A9FB
  66.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  67.         IMPORT_CFM_FUNCTION LoadScrap
  68.     ENDIF
  69.  
  70. ;
  71. ; pascal SInt32 GetScrap(Handle hDest, ResType theType, SInt32 *offset)
  72. ;
  73.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  74.         _GetScrap:    OPWORD    $A9FD
  75.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  76.         IMPORT_CFM_FUNCTION GetScrap
  77.     ENDIF
  78.  
  79. ;
  80. ; pascal SInt32 ZeroScrap(void )
  81. ;
  82.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  83.         _ZeroScrap:    OPWORD    $A9FC
  84.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  85.         IMPORT_CFM_FUNCTION ZeroScrap
  86.     ENDIF
  87.  
  88. ;
  89. ; pascal SInt32 PutScrap(SInt32 length, ResType theType, const void *source)
  90. ;
  91.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  92.         _PutScrap:    OPWORD    $A9FE
  93.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  94.         IMPORT_CFM_FUNCTION PutScrap
  95.     ENDIF
  96.  
  97.     ENDIF ; __SCRAP__ 
  98.  
  99.